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I= mens 
DATUM : 14 OCTOBER 1995 ‚van ca. 10.00 tot ca.17.00 u. 
PLAATS : PAROCHIECENTRUM „Melkweg 5,DE BILT. 


Op de A27 de afslag Utrecht-Oost,maar let vooral op de kleine witte 
aanduiding =VEEMARKT=, de Biltse Rading afrijden tot de splitsing 
Groenekan/Bilthoven ‚hier r.a. „20 meter verder l.a. 
Voor busreizigers : Vanaf Utrecht CS lijn 57,stopt op de Melkweg 
Breng brood mee, voor koffie wordt gezorgd. 
Voorwaarde : Iedereen is zelf verantwoordelijk voor zijn eigen 
apparatuur ‚etc. 
DEMO's: o.a.* R.Leurs 2 ATOM IN PC, verbeterde versie 
* L.Bijnagte : ATOM-in-PC onder Windows 
Het Bestuur van de Federatie, 
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VAN DE REDACTIE 


Het is mogelijk, U ziet het voor U, zomaar een tweede AN-nummer 
nog net aan het begin van de vacantie. 

Verzuchting van enkele ATOM-leden : het wordt me allemaal veel te 
ingewikkeld en te moeilijk. 

Oké, dat is zeker waa, maar het betekent ook , dat er met zo'n 
eenvoudig machientje, in combinatie met andere systemen ‚ nog 
allerlei ingewikkelde dingen gedaan kunnen worden. 

Als je dat 5 jaar geleden had voorspeld !. 

En „ wat ook zichtbaar is, je kunt ATOM-kennis en 

aanverwante electronica-ervaring gebruiken om ook met andere 
systemen kleine ontwikkelingen tot stand te brengen. 


Namens de redactie 
Bruno Tossaint, 


REGIO-MEDEDELINGEN . 


Bijeenkomsten op het bekende adres : 
Adolf van Cortenbachstraat 92, Eindhoven, tel. 0040-123231. 
Aanvang 13.30.u 


2. REGIO LIMBURG-BELGIE 


Clubavonden in "Oos Kaar" ,Geldersestraat 43, tel 046-321378. 
op de le vrijdag van de maand. 
BEHALVE IN AUGUSTUS 


3. REGIO DEN HAAG 


Alles op het nieuwe adres : Theo Waayer 
Hendrik v. Boeijenlaan 66, 2273 DC Voorburg,t. 070-3862504 


4. REGIO ARNHEM e.o. 
Geplande bijeenkomsten Acorn Atom Club Regio Arnhem: 
Ten Huize van Henri Derksen, Bolwerk 25, 6811 JE ARNHEM 
op de derde woensdag van de maand. 
Telefoon: 085-455485, Unicorn BBS: 085-425506 XXXX/XXXX BPS 
8N1 





PROGRAMMEERTIP v.SERIEELE POORT R.LEURS Pp. > 








Programmeertip : communicatie via de serièle poorten 

















door roland leurs 


Inleiding 


Vandaag in dit theater communcicatie via de seriële poorten 
van de PC. Net als bij zoveel andere hardware wordt geschreven 
en gezegd dat de Atom alle hardware van de -PC kan gebruiken. 
Voor een aantal stukken hardware gebeurt dat min of meer 
automatisch: beeldscherm, harddisk, printer, toetsenbord en 
muis. Hiervoor zijn eenvoudige statements beschikbaar die door 
iedereen zonder problemen gebruikt kunnen worden. Voor de 
poorten COM1 ... COM4 ligt dat net iets anders. Hiervoor 
hebben we (nog) geen statements tot onze beschikking. Dít 
zullen we dus anders aan moeten pakken. 


PC I/O benaderen 


Om te beginnen licht ik het direct aanspreken van hardware op 
de PC I/O-bus toe. Hiervoor hebben we de PC-commando's #23 
(lees I/O byte) en #24 (schrijf I/O byte) tot onze 
beschikking: 


PCCOM#23 Lees I/O byte 
Invoer : 1/0 adres (1 word) 
Uitvoer: gelezen data (1 byte) 
De PC leest het opgegeven I/O adres uit en geeft deze 
waarde aan de Atom. Het I/O adres ligt in het algemeen in 
het gebied $0000 - SO3FF. 


PCCOM#24 Schrijf I/O byte 
Invoer: I/O adres (L word) 
data (1 byte) 
Uitvoer: geen 
De PC stuurt de data naar het opgegeven I/O adres. Het 
1/0 adres ligt in het algemeen in het gebied $0000 - 
SO3FF. 


Voorbeeld: 
Om een byte van I/O adres #3F8 te lezen voeren we de 
volgende instrukties uit: 


LDA @#00 \ geef commando aan PC 

JSR HFFCS8 

LDA @#23 \ het is commando #23 

JSR #FFC8 

LDA @#F8 \ stuur low byte van adres naar PC 
JSR #FFC8 

LDA @#03 \ stuur high byte van adres naar PC 
JSR #FFC8 

JESR #EFCS \ lees het byte van de PC 
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In basic hebben we hiervoor het commando INP #3F8,A waarbij de 
waarde dan in de variabele A is opgeslagen. 


Om in assembler algemene routines te krijgen om een I/O byte 
te lezen of te schrijven heb ik de volgende routines 
geschreven: 


{+ OUTPORT stuurt een byte via PCCOM#24 van de Atom naar de I/O bus 
van de PC, Het I/O adres staat in de registers X (high byte) en Y (low 


byte). 

*) 

zOUTPORT PHA \ SAVE DATA 
LDA @#00 \ STUUR COMMANDO NAAR PC 
JSR HFFCB 
LDA @#24 
JSR HFFCB 
TYA \ STUUR LOW BYTE VAN I/O ADRES NAAR PC 
JSR HFFCB 
TXA \ IDEM VOOR HIGH BYTE 
JSR #FFCA 
PLA \ DATA TERUG HALEN 
JSR #FFCB \ EN NAAR PC STUREN 
RTS \ EINDE SUBROUTINE 


(* INPORT leest een byte van de PC I/O bus via PCCOM#23. Het I/O adres 
staat in de registers X en Y. Het gelezen byte komt in de accu. 
*) 


:INPORT LDA @#00 \ STUUR COMMANDO NAAR PC 
JSR #FFC8 
LDA @#23 
JSR #FFC8 
TYA \ STUUR LOW BYTE VAN I/O ADRES NAAR PC 
JSR #FFC8 
TXA \ IDEM VOOR HIGH BYTE 
JSR #FFC8 
JSR #FFC5 \ LEES DATA VAN PC 
RTS \ EINDE SUBROUTINE 


Deze routines worden later in het verhaal gebruikt om bytes 
van en naar de seriële poort te sturen/lezen. 


De 8250 Asynchronious Communication Element 





Vanaf de XT is de 8250 het standaard IC voor de seriële 
poorten van de PC. Aangezien alle volgende IC’s compatible 
zijn gebleven met de 8250 richt ik dit verhaal op deze 8250. 


De 8250 heeft elf registers in een adresgebied dat acht bytes 
groot is. Deze registers zijn: 
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Afkorting Naam DLAB offset 
RBR Receive Buffer Register 0 0 
THR Transmitter Holding Register 0 0 
IER Interrupt Enable Register 0 1 
IIR Interrupt Identification Reg X 2 
LCR Line Control Register X 3 
MCR Modem Control Register X 4 
LSR Line Status Register xX 5 
MSR Modem Status Register X 6 
SCR Scratch Register X 7 
DLL Divisor Latch LSB 1 0 
DLM Divísor Latch MSB 1 1 
Tabel 1: zegisters van de 8250 
Opmerking : X = don't care 


DLAB = Divisor Latch Access Bit 


Uit deze tabel valt meteen op dat RBR, THR, DLL en IER, DLM op 
dezelfde adressen benaderd worden. Een belangrijke rol hierbij 
is DLAB, Divisor Latch Access Bit. Dit is bit 7 van het LCR 
register. Als dit bit gezet is worden op de offset O en 1 de 
registers DLL en DLM benaderd. Met deze registers wordt de 
baudrate ingesteld. Als DLAB (=bit 7 van LCR) gewist is worden 
op offset 0 de registers RBR (bij lezen) en THR (bij 
schrijven) geadresseerd. Op offset 1 vinden we dan IER terug. 


De namen van de afzonderlijke registers geven naar mijn gevoel 
al duidelijk aan wat hun functie is. Voor een compiete 
omschrijving verwijs ik naar de datasheets van de 8250. Ik wil 
me beperken tot de benodigde handelingen om communicatie op te 
zetten. 


Initialiseren van de seriële poort 


Als eerste gaan we de baud rate instellen. De 8250 heeft een 
programmeerbare Baud Rate Generator [BRG] die de klok (DC tot 
10 MHz) kan delen door ieder getal tussen 1 en 65535. De 
uitgang van de BGR is 16 x de data snelheid. Dit gebeurt 
overigens allemaal intern in het IC. Het enige dat we moeten 
weten is de gebruikte klok en het deeltal. 


De meest gebruikte klok is 1,843200 MHz. Ik verwacht in het 
kader van compatibiliteit dat dit voor alle seriële poorten 
geldt. 


Het deeltal kunnen we bereiken door onderstaande formule te 
gebruiken: 


Klokfrequentie 
deeltal = ------rveeen. 
baudrate x 16 
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Bijvooorbeeld: we hebben een klok van 1843200 Hz en we willen 
data zenden en ontvangen op 1200 baud. Het deeltal is dan 
volgens bovenstaande formule: 1843200 / (1200x16) = 96. We 
dienen de Divisor Latch dan te vullen met #00 (hoge byte) en 


#60 (lage byte). 


{ Andersom kunnen we ook rekenen: stel we hebben 1,843200 MHz 
klok en we vullen de deler dan met 5. We krijgen dan een 
baudrate van 23040. Lekker niet standaard. Op deze manier 
kunnen we ook de maximale baudrate bepalen (115200) en de 
minimale baudrate (1,76). Maar dit terzijde} 


Om nu de deler in te stellen moeten we, zoals reeds eerder 
opgemerkt, eerst DLAB (=bit 7 van LCR) op '1' zetten. Daarna 
hebben we op de offset adressen O en 1 de registers DLL en DLM 
tot onze beschikking. In programmavorm ziet dat er zo uit: 


:COM = _ #2F8 \ BASISADRES COM2 

:SER_INIT LDA @#80 \ SET DLAB 
LDX @>COM \ LOAD HIGH BYTE I/O ADRES 
LDY @<COM+3 \ LOAD LOW BYTE I/O ADRES line control 
JSR OUTPORT \ SCHRIJF NAAR I/O 
LDA @#60 \ LAADT LAGE BYTE VAN DELER (1200 baud 
LDY @<COM+0 \ LAGE BYTE I/O ADRES divisor latch 
JSR OUTPORT 
LDA @#00 \ LAADT HOGE BYTE VAN DELER 
LDY @<COM+1 \ LAGE BYTE I/O ADRES divisor latch hi 
JSR OUTPORT 

Of in Basic: REM adressen gelden voor COM1 


OUT #3FC,H#BO ; REM DLAB=l 
OUT #3F8,#60 ‚ REM DLL=#60 (1200 baud) 
OUT #3F9,#00 ; REM DLM=#00 


Vervolgens stellen we het protocol in: wel/geen parity, aantal 
databits en aantal stopbits in. Deze instellingen plaatsen we 


in het LCR: 
































nn 


Ol » $ datebt 
10 « 7 databil 
Il « 4 databits 


9 « 1 stopbit 
1e 2 stopbita 














0 « gean parity 
1 = wel parity 





0 » oneven parity 
evan parity 








en stick parity 
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Als we kiezen voor de veel gebruikte instelling ‘geen parity, 
acht databits en 1 stopbit’ dan vullen we het LCR als volgt: 


00000011 = #03 


Omdat bit 7 ’0' is resetten we het DLAB en daarmee worden 
meteeen de transmit en receive data registers geselecteerd. In 
het programma ziet dat er zo uit: 


LDA @#03 \ LAADT INSTELLINGEN n,8,1 
LDY @<COM+3 \ LOW BYTE I/O ADRES line control 
JSR OUTPORT 


Tenslotte moeten we RTS en DTR aktief maken zodat de andere 
kant van de verbinding weet dat we wakker zijn. Dit zijn de 
bits 0 en 1 van het Modem Control Register. Here we go: 


LDY @<COM+4 \ INSTELLINGEN MCR 
LDA @#03 \ ZET RTS EN DTR 
JSR OUTPORT 


Daarmee zijn de instellingen compleet. Onze seriële poort is 
nu ingesteld op 1200 baud, 8 databits, 1 stopbit en geen 
parity. Verder zijn we klaar om data te ontvangen en te 
verzenden. 


Data verzenden 





Voordat we een byte kunnen verzenden moeten we even 
controleren of het voorgaande byte reeds verzonden is. Dit 
kunnen we testen aan de hand van het Transmitter Holding 
Register Empty bit in het Line Status Register. 


(* SER ZEND verstuurt een byte via de seriele poort. Hierbij wordt 
gewächt totdat het vorige byte verzonden is. 
*) 


SAVE DATA 


:SER ZEND PHA 
LAADT ADRES VAN LSR 


LDX @>COM 

LDY @<COM+5 
:SER_ZEND1 JSR INPORT 

AND @#20 

BEQ SER ZEND1 

LDY @<COM+0 

PLA 

JSR OUTPORT 


LEES STATUS 

TEST THRE 

SPRING ALS BYTE NIET VERZONDEN 
LAADT ADRES VAN THR 

HAAL DATA TERUG VAN STACK 
VERZEND DATA 


eere ee 


Data ontvangen 


De ontvangst van data bestaat uit het testen of een byte 
ontvangen is en het lezen van de data. Als eventuele 
toevoeging kunnen we de geldigheid van de data testen. Alle 
informatie halen we uit het Line Status Register. De te testen 
bits zijn dan: 
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bit 
bit 
bit 
bit 


NEO 


byte ontvangen 

overrun error 

parity error 

frame error (bijv. aantal databits fout) 


In de meeste gevallen is het testen van bit 0 voldoende. 
























































:SER LEES LDX @>COM \ LAADT I/O ADRES 
LDY @<COM+5 \ VAN LSR 
:SER LEESI JSR INPORT \ LEES LSR 
AND @#01 \ IS DATA ONTVANGEN 
BNE SER _LEES1 \ NEE, DAN NOG FF WACHTE 
LDY @<COM+0 \ ER IS WEL DATA ONTVANGEN 
JSR INPORT \ LEES DEZE DATA 
Reg bit 7 bit 6 bit 5 bit 4 biet 3 bít 2 bit 1 bie 0 
j 
RER detabit 7 databit 6 databit 5 databit 4 databit 3 databit 2 databit 1 databit 0 
TR databit 7 databit 6 databit 5 databit 4 databit 3 databit 2 databit 1 databit 0 
DLL bit 7 bit 6 bit 5 hit 4 bit 3 bit 2 bit 1 bit 0 
Dit bit 15 biet 14 bit A4 bit 12 bát 11 bit 10 bit 9 bit & 
IER ij 0 0 EDSSI KLSI ETBEL ERBFI 
(Enable (Enable (Enable (Enable 
Modem Recaiver Transaittr| Received 
Statua Line Bolding Data 
Interrupt) | Status Register | Available 
Interrupt)| Fupty Interzupt) 
Interrupt) 
TR o o 9 o meo | mmrioo | «0 sis int 
LR DAS Sat Break | Stick Par | Even Par Enable Par| Stop bita Data bits | Data bits 
NCR 0 ° 0 Loop OUT 2 our 1 RTS DIR 
Lr o Tr s1 ra ze or 
{Transmit (Break (Praming {Parity (Overrun 
ter Eapty) Interrupt) | Error) Error) Erzor.) 
MSR RI CT8 TERI DDSR vers 
t { King ( Clear { Trsiling| ( Delta 
Carrier Indicator} To Send) Edge Ring Data To 
Detect } Indicator) Ready) 
SCR bit 7 bit 6 bik 5 bit 4 bit 2 bit 1 hit 0 


























Tabel 2: Regia 








rbeschrijving op bitnivesu 
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Praktijkvoerbeeld: vier op een rij 





Onderstaand programma is een voorbeeld waarbij er tussen twee 
Atoms gecommuniceerd wordt. Om eens wat anders te laten zien 
dan het oversturen van een tekst heb ik een versie van het 
wvier op een rij" spel gemaakt waarbij de twee spelers ieder 
met hun eigen computer spelen. De Atoms sturen via de seriële 
poort de benodigde gegevens over; hierbij is voorzien in een 
synchronisatie omdat de snelheid tussen twee computers in de 
praktijk meestal verschillend is. 


De bediening van het spel is vrij eenvoudig. Na opstarten 
verschijnt een hoofdmenu waarbij één speler kiest voor 
‘Verbind met andere speler’ en één speler kiest "Wacht op 
verbinding met andere speler’, Zodra de computers het contact 
gevonden hebben verschijnt het speelveld. Als het schijfje in 
de linker bovenhoek verschijnt is het uw speelbeurt, rechts is 
de beurt voor uw tegenstander, Beweeg het schijfje met de 
cursortoetsen links en rechts. Laat het vallen met een druk op 
de entertoets. Deze toetsaanslagen worden ook van de ene naar 
de andere Atom gestuurd. 


Een leuke optie cq oefening die u zelf mag toevoegen is het 
gebruik van een modem. Laat de Atom via het ATD...<telnr>... 
commando via de telefoonlijn contact zoeken met een andere 
Atom. U kunt dan on-line met iemand anders in het land "Vier 
op een rij" spelen. 


Afsluiting 


Op zich is het communiceren met een seriële poort van de pc 
niet veel anders dan in het geval dat een 8250 direct aan de 
processorbus hangt, Alleen de manier van aanspreken gaat in 
dit geval indirect, namelijk via pc-commando’s. 


Een groot nadeel van dit systeem is dat we geen interrupts 
kunnen gebruiken. De 8250 is niet in staat om een interrupt 
naar de Atom te sturen als een karakter ontvangen is. Daardoor 
wordt het moeilijk om een buffer te maken waar ontvangen data 
tijdelijk in opgeslagen wordt. 


Moge deze woorden een licht zijn voor uw leven, 


Met vriendelijke groeten, 


Roland Leurs Telefoon : 046-370650 
Prins Mauritslaan 43 Fidonet : 2:285/226.9 
6191 EC Beek Aconet 2 77:8500/208.32 


Titeratuurverwijzing: Datasheets 8250, verkrijgbaar via redactie Atom Nieuws 
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De listing: 
10 PROGRAM VIER OP EEN RIJ 570 Y=Y-1 


20 REM VOOR TWEE SPELERS 

30 REM (c) Roland Leurs 1995 

40 

50 PROC VELD 

60 CLEAR 23 

70 COLOUR 2;XPALET 0,2 

80 COLOUR 1;TWINDOW 
10,27,69,4;CLW 

90 FOR X=0 TO 6 

100 FOR Y=0 TO 5 

110 STEEN (X,Y, 0) 

120 NEXT Y 


130 NEXT X 
149 PEND 
150 


160 PROC STEEN(X,Y,C},Z 

170 COLOUR C 

189 XIF Y<0 THEN 2230 

190 ELSE Z=Y*60+110 

200 XCIRCLE F,‚(X*60+140),2,20 

210 PEND 

220 

230 PROC SPEEL-ZELF,A,C,T.X,Y 

240 X=0;Y=0;C=4+10*(K=2) 

250 STEEN(X,-1,C} 

260 DO 

270 SCAN O,A;A=A/#100 

280 IF A=77 AND X<é THEN 
STEEN{X,-1,2) ;X=X+1;STEEN(X,-1,C);ZB 
(75) ;T=LB 

290 IF A=75 AND X>0 THEN 








STEEN(X,-1,2) ;X=X-1;STEEN(X, -1,C);ZB 
(77) ;T=LB 

300 UNTIL A=28 AND VV(X,0)=0 

310 


ZB(28) ;T=-LB;STEEN(X,-1,2);Y=0 
320 COLOUR 7 
330 DO 
340  Y=Y+1 
350 UNTIL VV(X,Y) OR (Y=6) 
360 Y=Y-1 
370 FOR T=0 TO Y 
380 _ STEEN(X,T,C 
390 PAUSE 5 
400 IF Te>Y THEN STEEN(X,T, 0) 
410 NEXT T 





420 VV(X, Wel; =Z+1 

430 PEND 

440 

450 PROC WACHT-CP-ZET,A,C.T,X.Y 
460 Xe :C=4+10*(K=l) 









470 STEEN(X, 
480 DO 
490  A=LB;ZB(A) 

500 IF A=77 AND X<6 THEN 
STEEN (X, -1,2)};X=K+1;STEEN(X, -1,C} 
510 IF A=75 AND X>0 THEN 
STEEN(X, -1,2) ;X=X-1;STEEN(K, -1,C} 
520 UNTIL A=28 AND VV(X,0}=0 

530 STEEN(X,-1,2);Y=0 

S40 DO 

550  Y=Y+1 

560 UNTIL VV!X, 








1 OR (Y=61 


580 FOR T=0 TO Y 

5390 STEEN (X,T,C) 

600 PAUSE 5 

610 IF Tc>Y THEN STEEN(X,T, 0} 
620 NEXT T 

630 VV(X,Y}=2;B=B:1;Z=Ze1 

640 PEND 

650 

660 FUNCTION WINNAAR 

670 Y=0;W=0 


680 X=0 
630 IF VV(X,Y)=0 THEN GOTO 740 
700 IF (X<4);IF 


CVV(K, Y)=VV(X+1,Y)) AND 
(VV(X,Y)=VV(X+2,Y)) AND 
(VV(X, Y)=VV(X+3,Y)) THEN 
W=VV(X,Y];GOTO 760 

710 IF (K<4) AND (Y<3);IF 
(VV (XY) =VV(X+1,Y4+1}) AND 
(VV (X,Y)=VV(X+2,Y+2)) AND 
(VV (X,Y) VV (X43,Y+3)) THEN 
W=VV(X,Y};GOTO 760 

720 IF (Xe4) AND (Y>2);IF 
(VV (X,Y)=VV (X+1,Y-1)) AND 
(UU (K,Y)=VV(X+2,Y-2)) AND 
(UV(X,Y) =VV(X43,Y-3)) THEN 
W=VV(X,Y};GOTO 760 

730 IF (Y<3};1F 
(VV (XY) VVK, Y+1) ) AND 
(VVK, YJ =VV(X,Y+2)) AND 
(VV (X,Y] =VV(X,Y#3))} THEN 
W=VV(X,Y};GOTO 760 

240  X=X+1;IF Xe=6 THEN GOTO 690 

750 Y=Y+1;IF Y<=5 THEN GOTO 680 

160 _WINNAAR=W 

770 FEND 

780 

790 PROC MONITOR, X,Y 

800 @=0;CURSOR TO 0,0 

810 COLOUR 7;FOR Y=0 TO 5 

820 FOR X=0 TO 6;PRINT 
VV{X,Y) ;NEXT; PRINT’ 

830 NEXT Y 

840 PEND 

850 

860 PROC ZB(A),B 

870 INP P+5,B;IF B&#60<>#60 THEN 
GOTO 870 

880 OUT P,A 

890 PEND 

200 

910 FUNCTION LB,B 

920 INP P+5,B;IF B&#01=0 THEN 
GoTO 920 

930 INP P,B 

940 LB=B 

950 FEND 

950 

970 REM init seriele poort 

980 P-#2FB ; REM COM2 

930 OUT P+3,#80;OUT P,#OC;OUT 
P+1,#00;OUT P+3,#03;OUT P+4, #03 

1200 DIM WV(7,6) M(80) 


PROGRAMMEERTIP v.SERIEELE POORT 


R.LEURS Pp. 





1010 CLEAR 5;CURSOR OFF 
1020 $M="Verbind met andere speler 
Wacht op verbinding met 
andere speler” 
1030 SM+LEN M="Instrukties 





1040 ATTRIB #5F;CURSOR TO 
5,1;PRINT "Vier op een Rij - 2 
spelers" 

1050 PDMENU 1,10,37,3,D,#47,5$M,K 

1060 CASE K OF 

1070 «<0> TXMOD;ATTRIB 7;EKXIT 

1080 «<1» GOTO 1250 

1090 «<2» GOTO 1340 

1100 CEND 

1110 ATTRIB 3;CLS;KADER 
0,2,33,0,D, #03 

1120 PRINT * 
EN RIJ"! 

1130 PRINT "Kies vanuit het 
hoofdmenu ‘Verbind met" 

1140 PRINT “andere speler’ als u 
zich bij de andere"* 

1150 PRINT "speler wil aanmelden 
om te spelen.” 

1160 PRINT "U speelt dan met de 
rode stenen en uw’ 

1170 PRINT “tegenspeler speelt met 
geel." 

1180 PRINT "Kies ‘wacht op 
verbinding met andere” 

1190 PRINT "speler’ als de andere 
partij zich bij u" 

1200 PRINT "moet aanmelden om te 
spelen. U speelt" 

1210 PRINT "dan met geel en de 
tegenspeler met rood. "*: 

1220 PRINT “Beide computers dienen 
via een seriele” 

1230 PRINT * 
verbonden te z - 
1240 PRINT "kan zijn dat tijdens 

het spel even”’ 

1250 PRINT "gewacht wordt omdat de 
computers na”” 

1260 PRINT "tedere zet 
synchroniseren. "’ 

1270 PRINT * druk op een toets 
voor het menu hi 

1280 LINK #FFE3;GOTO 1010 

1290 B=l;CURSOR TO 9,22;COLOUR 3 

1300 PRINT "Wacht op antwoord van 
andere speler …… 

1310 DO ZB(82) 

1320 UNTIL LB=71 

1330 GOTO 1390 

1340 B=0;CURSOR TO 0,22;COLOUR 3 

1350 PRINT "Wacht op antwoord van 
andere speler …." 

1360 DO UNTIL LB=82 

1370 ZB(71) 

1380 GOTO 1390 

1390 VELD 

1400 FOR X=0 TO 7 

1410 FOR Y=0 TO 6 

1420 _ VV(X,Y}=0 

1430 NEXT Y 

2440 NEXT X 


VIER OP E 














1450 Z=0 

1460 DO 

1470 XIF B=-i THEN SPEEL-ZELF 

1480 ELSE WACHT-OP-ZET 

14390 UNTIL (WINNAAR) OR Z=42 

1500 TWINDOW 0,29,79,0;CURSOR TO 
29,28;ATTRIB 15 

1510 IF W=0 THEN PRINT "Geen 
winnaar ……. * 

1520 IF WeK THEN PRINT "Rood heeft 
gewonnen 17 

1530 IF We>k THEN PRINT "Geel 
heeft gewonnen |" 

1540 LINK #FFE3;GOTO 1010 





Opmerking: om dit programma 
te gebruiken heeft u 
ATOM.COM v3.085 of hoger 
nodig alsook PC-Utility box 
V1.99i of hoger. 


Deze bestanden zijn te 
downloaden vanaf het Unicorn 
BBS: 0865-425506. 
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Uit de oude doos 


Inleiding 


Soms zijn er van dle programma’s die feitelijk tot de categorie ‘evergreen’ horen. Dat 
zijn van die, vaak kleine, programma’s die tets leuks of aardigs doen, zonder dat het al 
te ingewikkeld wordt. Een van die programma’s ls van Time Data, en gezien de datum 
van 1981, heb Ik de vrijheld genomen deze ult te printen en als [lsting mee te nemen. 
Zo de elgenaar zich nog steeds bezighoudt met Atom’s, zal deze er wellicht geen 
moelte meer mee hebben dat het werk in reproduceerbare vorm wordt afgedrukt. 


Wat doet het 


Het Idee ís simpel: Neem drie bakjes en leg onder een van die bakjes een balletje. 
Draai vervolgens en schuif met dle bakjes en laat de tegenstander, u dus daar aan de 
andere kant van het toetsenbord, raden in welke van de drie het balletje valt te 
bewonderen. 

In tegenstelling tot wat er met het zelfde spel in een wat bedenkelijker circuit wordt 
gedaan, gaat het hler om een volstrekt eerlijke methode. Er wordt dus geen trukwerk 
gedaan en u wordt nlet bedrogen. 


Veel plezier met het spel! 


1 REM-BY D.DINI 

5 O=0 

10 DIMCC(3) 

15 H=100;M=0 

20 E-#40;F=#7F 

30 PRINT$12"***cupball*t#":"COPYRIGHT TIMEDATA LTD, 1981"'’ 

35 PRINT"PRESS ANY KEY TO START."' 

40 PRINT"THREE SQUARES WILL THEN APPEAR, "' 

45 PRINT"ONE CONTAINING A BALL. "'" 

50 PRINT“PRESS ANY KEY AGAIN, "’"THE BALL WILL VANISH AND 
THE" 

55 PRINT"SQUARES WILL MOVE AROUND, "'' 

60 PRINT"KEEP YOUR EYE ON THE SQUARE THAT CONTAINED THE 
RAALI."** 


p: 
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90 PRINT"THE GAME WILL GET FASTER AS YOU GET BETTER. 
95 LINK#FFE3 

100 CLEARO 

105 IFH<l;H=l 

110 FORT=OTO2;CC(T) =#8100+T*3 ;NEXT 

120 FORT=OTO2; ?CC{(T) =F ; NEXT 

125 ?CC1=#AA 

127 @=4 

130 PRINT$30"GO-"M+1 

150 LINK#FFE3 

155 FORT=OTO2;CC{(T) =#8100+T*3;NEXT 

160 ?CCl=F 

165 FORS=0TO24 

170pJ=A.R.%3;K=A.R.%3 

175 IFJ=K;G.p 

178 U=64 

180 A=CC(J) ;B=A-U 

190 C=CC(K) ;D=C+U; GOSUBy 

200 A=CC{(J) -U;B=CC(K) -U 

210 C=CC(K) +U;D=CC (J) +U; GOSUBX 

220 A=CC(K) -U;B=CC(K) 

230 C=CC(I) +U; D=CC (JI) ; GOSUBy 

240 Q=CC{I) ;CC(I) =CC(K) ;CC(K) =O 

245 FORT=0TO2; ?CCT=#40 ; CC(T) =CC(T) +1; ?CCT=F'; NEXT 

250 NEXT 

260 FORT=0TO2;? (CC(T) +64) =(CC{(T) -#811C) /3+#32 

265 IFT=1;R=? (CC(T) +64) -#30 

266 NEXT 

270 INPUT’"WHICH SQUARE IS THE BALL IN"I 

280 IFI=R;PRINT"WELL DONE! ";?CC1=#AA;H=H-15;M=M+1;G.5 

290 PRINT"WRONG- SORRY.";?CC1=#AA;G.e 

300SFORT=0TO5000;NEXT;G. 100 

400ePRINT’ *" **KGAME OVER# #4 10 

405 PRINT"YOU GOT"M" GOES RIGHT"’’ 


410 
999 


PRINT'' "press any key to restart ";LINK#FFE3 ; RUN 
END 


1000yQ=32; IFB<A;Q=-0 


1005 
1007 
1010 
1015 
1020 
1025 
1040 
1500x0= 


P=32;IFD<C;P=-P 

N=C 

FORT=A TO B-Q STEP Q 
GOSUB t 

2T=E;T?Q=F; PN=ZE;N?P=F 
NeN+P 

NEXT T;RETURN 
„IFBcA;:Q=-Q 
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1505 P=l;IFD<C;P=-P 

1507 N=C 

1510 FOR TzA TO B-Q STEP Q 
1515 GOSUB t 

1520 ?T=E;T?Q=F; ?N=E;N?P=F 
1525 N=N+P 

1540 NEXT T;RETURN 
2000tFOR I=0 TO H;NEXT 
2010 IFH>16;WAIT;RETURN 
2020 IFO=1;RETURN 

2030 O=l;H=H+16 

2040 RETURN 
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De 65802 


Na een onderbreking van enige nummers, pak ik de draad weer op voor het beschrij- 
ven van de mogelijkheden van de AtomSX. 


De stand van zaken 


In de vorige afleveringen is de droge, doch noodzakelijke theorie behandeld over het 
hoe en waarom aan de binnenkant van de processor. In de nu volgende afleveringen 
wordt het allemaaf al wat beter, want dit worden afleveringen met wat voorbeelden, en 
die zeggen vaak meer dan bladzijden vol met droge kost. 


Het inrichten van de omgeving 
De Assembler 


Met een standaard Atom is het niet mogelijk om via de Assembler 65802 code te 
genereren. Uiteraard zou het wel kunnen met wat extra ?..=#ba etc, maar In de 
praktijk werkt dit niet goed. Maar er is hoop, want de onvolprezen SALFAA onder- 
steunt deze processor volledig. Het enige wat u dus nodig hebt is een versie van deze 
uitbreidingsroms, net als de benodigde schakelsoft om dit ding op het Juiste djdstip 
’voorgeschakeld’ te hebben. 


Het aanroepen van de routines 


lets anders is het aanroepen van de functies. Dat is een verhaal apart. In alle voor- 
beelden wordt aan het begin van de routine overgeschakeld naar de native 802 mode, 
en aan het einde, net voor terugkeer naar de aanroeper, weer naar de 6502 mode. 
Tot zover is er helemaal niets aan de hand. Maar. Het grote maar zit in het aanroepen 
van bijvoorbeeld systeemroutines binnen de lus. Daar kan nou net een probleem zitten. 
Niet vanwege comptabiliteit, nee, die is voldoende gewaarborgd, maar vanwege het 
gedrag van de processor. Er zijn bijvoorbeeld routines die net zolang de accu verhogen, 
totdat deze weer O is. Bij een acht bits register gebeurt dit nadat waarde 255 is 
geweest automatisch via het wrap around’ gedrag. Als echter dit zelfde deel gedaan 
wordt in een modus waarbij het A register ingesteld staat voor 16 bits dan ‘gaat A pas 
door de O’ bij een waarde van 65535 (FFFF). Het complexe zit hem dus hierin dan de 
uit te voeren instructies min of meer context gevoelig zijn geworden. 
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Op zich klinkt dit natuurlijk zorgelijk, maar naarmate u en ik meer ervaring met de 
802 gaan krijgen, is ook beter Inzicht te krijgen in het gedrag van eventueel aan te 
roepen subroutines. 

Vooralsnog is het verstandig om binnen een routine met ‘native’ 802 instructies, geen 
Atom routines aan te roepen. De voorbeelden bij dit verhaal zijn ook op een zodanige 
manier opgezet, dat dit voorlopig niet nodig hoeft te zijn. 


lets over het debuggen 


Het debuggen van een in assembler geschreven stuk machine taal, kan soms verhelde- 
rend zijn, maar soms ook noodzakelijk. Met name in een nieuwe omgeving, waar het 
gedrag van een swk soft of hardware alleen maar uit de boeken is verkregen, is het 
goed om te ’zien’ wat er gebeurt. 

Voor de Atom Is er wat dat betreft niet te klagen. Zowel de JosBox, als de Jbox 
hebben zo’n voorziening. Maar. Maar deze zijn alleen bedoeld voor een 6502, en niet 
voor de collega 802. Met andere woorden: daar moet aan gesleuteld worden. In basis 
valt de aanpassing wel mee, maar de grote behoeft zit in een 802 disassembler. Het 
zou het mooiste zijn als iemand dat al heeft gemaakt, dan pas ik vervolgens de step 
routine uit de JBox aan. Als Ik beide zou moeten doen, dus het maken van de 802 
disassemnbler en de aanpassing, dan zult u enige nummers verstoken blijven van 
verhaaltjes van mijn hand over de Atom. Wie helpt? 


Daar gaan we dan 


Om een programma te maken, is het verstandig uit te gaan van een raamwerk. lets wat 
feitelijk In elk programma terugkomt en waar je dus maar eenmalig over hoeft na te 
denken. In dit raamwerk staan de vereiste gegevens en wordt de assembler duidelijk 
gemaakt wat de bedoeling is. Hieronder de listing: 


10 REM DEMO VOOR 65802 

20 PASS2;GOSUB 100 

30 PASS1;GOSUB 100 

40 END 

100 ASM-BEGIN PART 1 

105 .LIST 

110 .OPTION :01001000 \ 802 INSTRUCTIES 
115 .CODE #2800 

120 :LABEL 

130 CLC 

140 XCE „ Zet E bit 
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150 NOP 

880 SEC 

888 XCE ; Reset het E bit 
899 RTS 

998 .END PART 1 

999 RETURN 


Allereerst wordt steeds op een vast adres de te maken machine code neergezet. Ik vind 
dat zelf handig, omdat ik dan steeds op de zelfde plaats kan kijken wat daar aan code 
gebeurd. 

Vervolgens wordt de SALFAA rom duidelijk gemaakt dat het hier om 802 code gaat. 
Als openingsoverture wordt de 802 via de reeds eerder behandelde constructie in de 
native mode gezet, via de carry wissel. Bij de ‘bijna klaar’ routine aan het einde van het 
geheel wordt de processor weer met beide benen op de 6502 bodem geplaatst. 

In de tussenliggende gedeeltes, kunnen de routines worden geplaatst met daarin de 
specifieke 802 instructies. Let er op dat ook nog steeds alle 'bekende’ 6502 of 65c02 
Înstructies gebruikt mogen worden. 


Tijd voor de vlaggeparade 


In een latere aflevering, zal ik nog eens uitgebreid ingaan op de vlaggen, maar er zijn er 
nu toch twee die al wezenlijk van belang zijn. Vandaar dat ik hier vast een voorschot 
op de toekomst neem en u deze twee vlaggen uitleg. Eigenlijk is dat snel gebeurd, want 
in de vorige aflevering heb ik iets verteld over 16 bit of 8 bits adressering. Met name 
het laden van geheugengegevens of het vullen van het X of Y register wordt door 2 
vlaggen bepaald. Deze vlaggen zijn respectievelijk de M of de X vlag. Door ze hoog te 
maken, gedraagt het geheel zich als 16 bies instrumenten en wat ze doen als deze 
vlaggen laag zijn, dat laat zich raden. 

Middels een speciale instructie is het tegenwoordig mogelijk om een vlag in het 
statusregister te zetten of te schonen. Hiertoe is respectievelijk de instructie SEP en 
REP. Als operand wordt de waarde van het P register meegegeven. Om nu het m bit 
te zetten, wat op bit 5 van het statusregister woont, te zetten ls een SEP @#20 
voldoende. In de eerste listing, wordt het geheel nog van wat extra commentaar 
voorzien, zodat u snel went aan deze werkwijze. 


Indelen in groepen 


Om te voorkomen dat we een speciale editie van AN alleen over de 802 gaan krijgen, 
is het verstandig om het geheel van de 802 op te splitsen in blokken. In iedere 
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aflevering zal dan een blok, of een deel van een blok, worden behandeld. De onderver- 
deling Is ats volgt: 


IDB WN 


10 

20 

30 

35 

36 

40 
100 
105 
110 
115 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
880 
890 
899 
200 
910 
998 
gg 


Verplaatsen van data 

Flow of control 
rekenkundig 

logische en bit manipulaties 
aanroepen van subroutines 
system control instructies 


Leendert 


REM bijdrage voor Intikken en Runnen maar 

REM Dit programma werkt wel op de originele atom, mits 
REM voorzien van een 65802. Op de Atom In PC kaart werkt 
REM dit niet. Wie begrijpt waarom niet? 

REM SALFAA rom vereist 

REM dit programma maakt het video geheugen van clear 4 
REM schoon, middels het 16 bits Y register. Veel een- 
REM voudiger dan de post indexed indirect: lda (#70) ,y 
REM DEMO VOOR 65802 

PASS2;GOSUB 100 

PASS1;GOSUB 100 

CLEAR 4 

LINK #2800 

END 

ASM-BEGIN PART 1 

„LIST 

„OPTION :01001000 \ 802 INSTRUCTIES 

„CODE #2800 

: LABEL 

CLC 

XCE 

REP @#20 

REP @#10 

LDY NUMBER 

LDA WAARDE 

:LOOP STA #8000,Y 

DEY 

BNE LOOP 

SEC 

XCE 

RTS 

:WAARDE .DD #FFFF 

:NUMBER .DD #1800 

END PART 1 

RETURN 


DE 65802, VERPLAATSEN v.DATA L.BIJNAGTE Pp. 41 





De 65802 
Deel 1: Verplaatsen van data 


De meeste mensen denken bij wat een computer doet aan het maken van hele 
complexe berekeningen. Maar dat is slechts een deel van de functionaliteit. Een groot 
gedeelte van de tijd gaat op aan het verplaatsen van data. Bekend voorbeeld is die van 
een spelletje: Alles wat je in een grafische mode ziet bewegen, is het gevolg van het 
verplaatsen van data. 

Ruwweg vallen die verplaatsingen in te delen ín de volgende groepen: van hier naar 
daar; van hier naar de processor om daar vervolgens lets mee te doen en als laatste van 
de processor terug in het geheugen. 

Het verplaatsen van data als leerbron voor de 802 is vrijwel Ideaal. Er valt direct te 
zien wat er gaat gebeuren. Als dat eenmaal duidelijk is, is het ook niet moeilijk de rest 
van de 802 te doorgronden. In dit stuk houden we ons volledig bezig met het 
verplaatsen van gegevens via de Accu, en dit op velerlei manieren. 


Voor het verplaatsen van data zijn de volgende instructies beschikbaar: 
6502 65802 Beschrijving 


Load & store instructies 
laad de accumulator 


LDA x x 

LDX x x laad het X index register 

LDY x x [aad het Y index register 

STA x x bewaar de accumulator 

STX x x bewaar het X index register 

STY x x bewaar het Y index register 

Push instructies 

PHA x x zet accu op de stack 

PHP x x zet status register op de stack 

PHX x zet het X Index register op de stack 
PHY x zet het Y index register op de stack 
PHB x zet databank regelster op de stack 
PHK x zet program bank register op de stack 
PHD x zet DP, direct page register op de 


stack 
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6502 65802 Beschrijving 

PEA x zet effectieve absolute adres op de 
stack 

PEI x zet effectieve indirecte adres op de 
stack 

PER x zet effectieve relatieve adres op de 
stack 

Pull Instructies 

PLA x x haaf accu van de stack 

PLP x x haal status register van de stack 

PLX x haal X indexregister van de stack 

PLY x haal Y Indexregister van de stack 

PLB x haal data bank register van de stack 

PLD x haal Direct Page register van de stack 

Transferinstucties 

TAX Xx x transfer Accu naar X indexregister 

TAY x x transfer Accu naar Y indexregister 

TSX x x transfer stackpointer naar X indexre- 
gister 

TXS x x transfer het x register naar de stack- 
pointer 

TXA x x transfer het x register naar de accu 

TYA x x transfer het y register naar de accu 

TCD x transfer het C register naar het DP 
register 

TBC x transfer het DP register naar het C 
register 

TCS x transfer de stackpointer naar het C 
register 

TSC x transfer C accumulator naar Stack- 
pointer 

TXY x transfer X indexregister naar Y index- 
register 

TYX x transfer Y indexregister naar X index- 


register 
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6502 


Wissel instructies 
XBA 


XCE 


Clear geheugen 
STZ 


Blok bewerkingen 


MV 


N 


MVP 


65802 Beschrijving 

x Verwissel accu A en accu B van in- 
houd 

x Verwissel Carry en Emulatiebit 

x sla O op in geheugenlocatie 

x Verplaats blok geheugen In negatieve 
richting 

x Verplaats blok geheugen In positieve 
richting 


Hier is een voorbeeld met de basis instructies, LDA, LDX, LDY en STA, STX en STY. 
In dit voorbeeld is gekozen voor de absolute adressering. Dit is de meest eenvoudige en 
elementaire functie van de adresseringsvormen. 


10 
20 
30 
40 


100 ASM-BEGIN PART 1 


105 
110 
115 
120 
130 
140 
150 
160 
170 
880 
888 
899 
900 
910 
998 
99g 


REM DEMO VOOR 65802 Listing 2 


PASS2;GOSUB 100 
PASS1;GOSUB 100 


END 


„LIST 


„OPTION :01001000 \ 802 INSTRUCTIES 


„CODE #2800 

: LABEL 

CLC 

XCE 

SEP @#20 

LDA SOURCE 
STA DEST 

SEC 

XCE 

RTS 

: SOURCE DB 
:DEST DB 
„END PART 1 
RETURN 


; Zet E bit 
; Zet 8 bits datamode 


; Reset het E bit 


#77 
0 


P.44 DE 65802, VERPLAATSEN v.DATA L.BIJNAGTE 





Hier wordt de 8 bits data mode gezet. Het is altijd verstandig om deze vlag op de 
juiste waarde te zetten. Ga er noolt vanuit dat deze goed staat, want het Is niet bekend 
wat een vorige routine mee heeft gedaan. 

Het programma wordt vla een call naar #2800 aangeroepen. Met behulp van een 
printopdracht kunt u de waarde op DEST weer uidezen. In dit geval zult u zien dat het 
gedrag van dit programma identiek is aan dat van de ons zo bekende 6502. 

lets anders wordt het al als de datamode in 16 bits wordt gezet. Met het zelfde 
programma wordt het dan mogelijk om 16 blts bewerkingen te doen. Breng dan de 
volgende wijzigingen aan In de listing: 


150 REP @#20 ; Zet 16 bits datamode 
900 :SOURCE DD #7F7F 
910 :DEST DD 0 


Nu wordt met identieke opcodes, maar met een gewijzigde M flag, een 16 bits 
bewerking gedaan. 


Het effect van load en store opdrachten op de vlaggen 


Een van de gevolgen van het laden van een waarde In de registers, is dat het statusre- 
gister wordt bijgewerkt. Met name de N en de Z vlag, worden aangepast overeenkom:- 
stig de Inhoud van de registers. De Z vlag wordt gezet als het om een register met als 
Inhoud O gaat, het N vlaggetje wordt gezet als het resultaat negatief ls, als het getal 
een teken heeft en als twee-complement is opgeslagen. 

De store opdracht verandert geen vlaggen, dit In tegenstelling met bijvoorbeeld een 
6Bxx processor. 


Het verplaatsen van gegevens middels de stack 


Alle 65x processoren hebben een enkelvoudige stackpointer. Dit is het gevolg van het 
ontwerp. Dit betekent dat zowel het operatingsysteem alsook de gebruik gebruik maakt 
van een en dezelfde stack. 

Vla de stackpointer wordt verwezen naar de eerst vrije geheugenlocatie. Er zijn 255 
stackposities beschikbaar, maar door de Atormrom worden daar op voorhand al 128 
bytes vanaf gesnoept. 

Vanwege de opzet, gebruikt ook de 65802 ook page #01 als stackpage. 
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Push 


Deze Instructie wordt In zijn algemeenheid gebruikt om gegevens op de stack te 
plaatsen. Afhankelijk van de grootte, kost dit 1 of 2 bytes. 

Als een byte op de stack wordt gezet, dan wordt dit gedaan op de locatie waar de 
stackpointer op dat moment naar verwijst. Vervolgens wordt de stackpointer met 1 
verlaagd. 

Als er een dubbel byte wordt opgeslagen, dan wordt eerste het high order byte 
opgeslagen, de stackpointer wordt verlaagd en vervolgens wordt het low order byte 
opgeslagen, waarna opnieuw de stackpointer wordt verlaagd. 

In beide gevallen groeit de stack dus 'naar beneden’ en wijst de stackpointer telkens 
naar de eerst vrije locatie. 

Het gedrag van de PHA en PHP is natuurlijk bekend. Nieuw sinds de introductie van 
de 65cO2 Is de PHX en PHY. Met deze instructies Is het mogelijk om in een keer de 
index register te bewaren. De volgende constructie, die vaak werd toegepast, is dan 
niet meer nodig PHA; TYA; PHA; TXA; PHA. 


De adder op het gras 


Het is leuk en aardig dat er nu geschakeld kan worden tussen 16 en 8 bits registers, 
maar dat heeft uiteraard wel consequenties. Wie een 16 bies indexregister op de stack 
zet, moet niet verwachten dat als er een 8 bits PULL gedaan wordt, dit automatisch 
goed gaat. Op zich wordt er een 8 bits waarde afgegeven, maar er staan nog 8 bits te 
trappelen. Even opletten dus, dat ook dat goed gaat. 


Pull 

Met de pult instructies is het mogelijk om de op de stack geplaatste gegevens ook weer 
terug te halen. Met de PLX en PLY worden de indexregisters teruggehaald. 
Uitbreidingen 

De 802 voorziet in nog een paar handige uitbreidingen waar het gaat om stackbewer- 


kingen. Het is nu ook mogelijk om het actuele adres op de stack te zetten. Dit kan 
absoluut, het ‘harde’ adres, indirect of relatief, dus ten opzichte van de programcoun- 
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ter. 

In een latere aflevering wordt hier nader op ingegaan. 

De hier niet behandelde instructies zijn feitelijk alleen van toepassing voor de grote 
broer van de 802, de 65816. Hoewel de registers wel functioneren, worden zij in 
functionaliteit beperkt door het feit dat er ‘maar’ 64k valt te adresseren, bij gebrek aan 
naar buitengebrachte adreslijnen. 


Het verplaatsen van data wissen de registers 


Er wordt veel gewisseld tussen de registers, waar het gaat om bewerkingen. Of het nu 
gaat om rekenkundige bewerkingen of het verwijzen naar stukken geheugen, de 
registers zijn er goed voor. De TAY, TAX zijn de bekende werkers van dit geheel. 
Nieuw zijn TXY en TYX, die er voor zorgen dat met een opcode de registers worden 
gecopieerd. Vervangt dus de PHA;TXA;TAY;PLA combinatie met al de varianten 
daarop. 

Uiteraard wet een woord van waarschuwing voor het verplaatsen van data van een 8 
naar een bits register en andersom. In een van de vorige afleveringen is daar een tabel 
van gemaakt, maar houdt vast aan de volgende regels: 


Î Het gedrag wordt bepaald door het bestemmingsregister 


Dus bij een copy van een 16 bits naar een 8 bits, wordt alleen het low byte overgehe- 
veld. 


2 Als het index register acht bits is, is het high byte van dit index register altijd O. 


In de onderstaande listing is hiervan een voorbeeld gegeven. Experimenteer naar vrije 
lust om zo inzicht te krijgen in het gedrag. Tot zover deze aflevering, anders wordt de 
eindredacteur boos op mij. 


10 REM DEMO VOOR 65802 Listing 3 

20 PASS2;GOSUB 100 

30 PASS1;GOSUB 100 

40 END 

100 ASM-BEGIN PART 1 

105 .LIST 

110 .OPTION :01001000 \ 802 INSTRUCTIES 
115 .CODE #2800 

120 ‘LABEL 
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130 
140 
150 
160 
170 
180 
190 
200 
880 
888 
899 
900 
910 
998 
999 


CLC 

XCE 

REP @#20 
SEP @#10 
LDA DATA 
TAY 

REP @#10 
STY DATA2 
SEC 

XCE 

RTS 

:DATA 
:DATA2 
END PART 1 
RETURN 


DD 
DD 


; Zet E bit 
; Zet 16 bits datamode 
; Zet 8 bits indexregisters 


; Zet 16 bits indexregister 


: Reset het E bit 


#FF33 
0 


Houdt u mij op de hoogte van uw ervaring? 


Leendert 
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AANKONDIGING 
ATOM IN PC 
versie 3 


Roland Leurs 








Binnenkort is het zo ver. De nieuwe versie van het Atom Terminal programma, alsmede 
een verbeterd Operating Systeem voor de Atom in PC kaart is op komst. In 
september/oktober verschijnt in plaats van Átom Nieuws een kompleet nieuwe handleiding 
(A5-formaat) met daarin verbeteringen van de originele handleiding en natuurlijk veel 
nieuwe informatie omtrent de nieuwe software. Ook zijn er hoofdstuken gericht aan de 
WinAtom software en de [/O uitbreidingen. 


Nieuw in het terminal programma zijn hoofdzakelijk grafische commando's die het 
gebruik van graphics in extended video modi moeten vereenvoudigen en versnellen. Een 
ander sterk verbeterd punt is een nieuwe keyboardscan routine. 


In het nieuwe Enhanced Pc Operating Systeem (EPOS/3) zijn diverse kleine wijzigingen 
verwerkt om gebruik te maken van de nieuwe mogelijkheden van het terminal 
programma. Sterk gewijzigd zijn PC-DOS en de scherm/toetsenbord routines. De toolbox 
“PC Utility Box” biedt vanuit Basic toegang tot de vele nieuwe grafische commando's van 
het terminal programma. 


OPROEP 


Diverse mensen hebben in het verleden melding gemaakt dat ze de schema's opnieuw 
getekend hebben. Mocht u een bruikbaar schema hebben neem dan s.v.p. contact op met 
de redactie van Atom Nieuws. 


Natuurlijk zijn ook andere tips en suggesties nog van harte welkom. 


Roland Leurs Telefoon : 046-370650 
Prins Mauritslaan 43 Fidonet : 2:285/226.9 
6191 EC Beek Aconet : 77:8500/208.32 
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80 Kolommen Club Kaart aan de 
Atom in PC 


Een berichtje uit fidonet: 





NetMail - The Matrix (Private Messages) 
Mon 17 Apr 1995 16:00:25 

Roland Leurs on 2:285/226.9 

Leendert Bijnagte on 2:285/226.10 

Is ik nu helemaal gek geworden ... ? 
Private Sent Local 





Hi Leendert, 


Sinds enige tijd werkt Willy's drive al aan mijn Atomkaart. Ik 
heb al een programma geschreven dat alle files van een atom 
disk inleest en die vervolgens wegschrijft naar een pc-drive. 
Handig en leuk. 


Vandaag heb ik mij voor de grap eens gestort op de 80 
kolomskaart van de klub. Het ding ligt toch maar stof te 
verzamelen in het beunhok, dus waarom niet een leuk 
demooooooooootje gemaakt voor 29 april. Zo gezegd, zo gedaan. 
Kaart er in prikken (plug 'n play op de Atom in PC, even de 
WRCH routien aanpassen voor de PC en draaien maar. 


Demo: de Atom stuurt nu zijn beeldscherm output naar de 80 
kolomskaart en heeft dus geen pc meer nodig. Terwijl ik deze 
tekst intiep flikkert naast mijn VGA buis een tot monitor 
omgebouwde zwartwit tv met daarop een grote eikel. (Nee, 

geen foto van mijn domste collega maar een demo programma van 
Peter Wokke voor VDU3,4). 


Hmmmmm, nu nog een toetsenbord aan mijn I/O kaart en ik heb 
een Atomkaart die zo stand alone kan draaien dat er geen pc 
meer nodig is .... een losse Atom dus .... maar die had ik al 


IIIA 


Roland 


PS: de software voor de 80 kolomskaart staat al op Henri’s 


BBS, tel 085-425506, 
Files: ATOMDOS.ZIP en V8OEPOS3.ZIP in de Acorn Atom file area. 
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Uitbreiding aan de Atom in PC kaart 


Inleiding 


Nu er wellicht meer operationele Atom in PC kaarten zijn dan Acom Atoms, is het 
vast aardig te kijken naar de extra mogelijkheden die er zijn. Nee, niet een artikel waar 
de soldeerbout een hoofdrol gaat spelen, maar puur een artikel over het uitbuiten van 
de eventueel aanwezige hardware in de PC zelf. Op zich is dat niet zo bijzonder, wat 
dat gebeurt ook al bij bijvoorbeeld de harde schijf. 

Dit artikel gaat in het bijzonder over de floating point, met name hoe dit werkt in de 
PC en wat voor mogelijkheden er zijn om dit te gebruiken. Een voorschot op de 
toekomst dus. 


Fleating point 


Met floating point wordt bedoeld het rekenen met fractionele getallen, in gewoon 
Nederlands: gebroken getallen. 

Bij het maken van berekeningen op basis van gehele getallen, is niet veel extra werk 
nodig. Met wat optel- of aftrekwerk, is al een heel behoorlijk resultaat te krijgen. 
Anders ligt dat bij Floating point. Daar is heel wat kunst en vliegwerk voor nodig om 
dat te bewerken. Het is dan ook niet voor niets dat alleen al in de Atom dit stukje 
rekenwerk een slordige 4k aan ROM in beslag neemt. 

Synoniem voor complexiteit is natuurlijk snelheid, dat wil zeggen: het gebrek daaraan. 
Een complexe berekening kost veel bewerkingen en dus veel tijd. 

Een van de mogelijkheden is voor de Atom in PC kaart bezitters, dit soort werk uit te 
besteden aan de processor van de PC, daar deze de meeste tijd toch loopt te lanterfan- 
ten. 


Floating point 


De PC heeft een aardige historie. Uiteraard niet zo’n rijke zoals de Atom familie, maar 
wordt toch gekenmerkt door een aantal leuke ontwikkelingen. In de origineie 8088 PC 
was al een plaatsje gereserveerd voor een NPX, een mathematische Co-processor, 
Numeric Processor eXtention, zoals de Fransen dat noemen. Dat is een chip ter grootte 
van een 8088, die je voor de prijs van 3 Atoms aan kon schaffen en vervolgens in het 
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daarvoor bestemde voetje kon prikken. 

Deze chip is In staat om in hardware een aantal floating point berekeningen te doen. 
Voor de programmeur een verademing, want deze hoefde niet met fracties te rekenen; 
voor de gebruiker een lust, daar het programma tot een factor 50 sneller gaat en 
tenslotte voor de toenmalige leverancier een onelgenlijk grote bron van inkomsten. 

In die tijd (1985-1987) heeft zo’n processor niet echt furore gemaakt. Uiteraard is de 
prijs daar een bepalende factor In geweest. 

Later komen er ook voor de 80286 en de 80386 bijbehorende numerieke processo- 
ren op de markt. Prijzen worden ook wat reëler. Daar de processoren( 8087, 80287 
en 80387) vrijwel gelijke functionaliteit bieden, worden ze vaak gemakshavle x87 
genoemd. 

Pas echt leuk wordt het met de komst van de 486 DX. Wat ls daar nou zo bijzonder 
aan? Elgenlijk niets. De 486 is eigenlijk een marketing chip. Dat wil zoveel zeggen dat 
er feitelijk geen sprake is van nieuwe technologie, maar slechts een optimalisatie. Zo 
ook de 486. Deze processor is een samensmelting van een 386 en zijn numeriek broer, 
de 387. Giet daar een sausje met wat cache geheugen over en Intel [aat de kassa weer 
rinkelen. 

Wie nu de beschikking heeft over een 486 DX, kan automatisch gebruik maken van de 
floating point mogelijkheden, deze zitten daar dus al ingebakken. De SX’ers hebben 
pech, wat dat is een uitgeklede uitvoering van de DX, het uitgeklede zit hem, naast het 
slopen van de halve databus, ook in de afwezigheid van de floating point hardware. 
Een 386 dus. Met wat intere cache. 


Het uitbesteden van floating point opdrachten 


Het idee voor de uitbreiding is als volgt: 

Geef aan de PC door om welke getallen het gaat en welke rekenkundige bewerking 
daarop nodig Is. Vervolgens wordt het resuítaat terug gemeld aan de Atom. 

Eigenlijk klinkt dat heel simpel en u raadt het al: dit stukje zou nlet geschreven zijn als 
dat niet zo was. 

Sterker nog: er is nog vrijwel niets, wat als voorbeeld zou kunnen worden getoond, met 
andere woorden: er is nog niets werkend. Het gaat hier alleen over een experiment en 
wat gedachte wisselingen met de Master, ik bedoel uiteraard Roland, zelf, En deze 
gedachten hebben tot wat expertmenteerwerk geleid en dat op haar beurt weer tot dit 
verhaal. 

De eerste moeilijkheid is het uitwisselen van floating point informatie. Dat lijkt heel 
simpel te zijn, maar valt in de praktijk vies tegen. De Atom werkt met een intem 
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formaat van 5 Bytes. In Atom 3 nummer 6 zijn daar door Bas Kasteel al eens verstan- 
dige opmerkingen over gemaakt, met andere woorden: dat is al min of meer uit 
gewerkt. 

lets anders is het met de Intel notatie. Deze werkt op basis van een standaard zoals 
voorgeschreven door een commissie van vermeend wijze mannen: de IEEE. Deze 
standaardnotatie gaat schuil onder het nummer 754. Dit formaat wordt gespecificeerd 
in een 80 bits notatie. In onderstaande afbeelding is die representatie weergegeven. 


Van Atom naar x87 


De Atom slaat zijn gegevens in 5 bytes op, wat dus op 40 bits uitkomt. De PC doet 
het zelfde kunstje in 80 bytes. Met andere woorden met een groter nauwkeurigheid. 
Met een fikse omsleuteling wordt het resultaat van de Atom geprojecteerd in PC 
formaat en na gedane berekeningen weer verminkt tot een 40 bits getal. 

Er is nog gespeeld met de gedachte om de ruimte voor de floating point variabelen uit 
te breiden naar 80 bits, dat zou kunnen door nog een pagina te reserveren. In de oude 
Atom was dat pagina #28, waar %A en zijn makkers werden opgeslagen. Dat zou in 
theorie uitgebreid kunnen worden. Toch is dat niet echt zinvol, want alle bestaande 
programmatuur, welke gebruikt maakt van de Atom Floating point, ís van nature al 
gewend om met 40 bits overweg te gaan. Waarom roomser zijn dan de Paus. 


Opzet 


Er is gekozen voor de volgende aanpak. Als er een floating point opdracht wordt 
aangevraagd, wordt in de gewijzigde floating point enig voorwerk gedaan om de 
gegevens klaar te zetten voor het oversturen naar de Atom. Vervolgens wordt als 
laatste het soort opdracht, SIN, COS, EXP etc, meegegeven. Als dit allemaal compleet 
is, gaat de FPU aan het werk. Het resultaat wordt vervolgens teruggegeven aan de 
Atom, en de Atom zorgt voor de vervolgbewerking, bijvoorbeeld het opslaan van het 
resultaat in %A. 

Door een dergelijk opzet ontstaat er wel wat overhead, met andere woorden het zou 
iets efficiënter kunnen, maar heeft nu als belangrijk voordeel dat bestaande program- 
matuur niet hoeft te worden aangepast. 

Deze opzet werkt vrij eenvoudig en laat zich makkelijk realiseren. Het is de bedoeling 
dat het een uitbreiding wordt, die zowel werk voor de Dos alsook de Windows 
Terminal uitvoering. 





UITBREIDING AAN DE ATOM IN PC L.BIJNAGTE p. 33 


De pilot 


Om u vast wat te verlekkeren ís er een testprogramma’tje gemaakt, wat de verschillen 
In tijd laat zien tussen de Atom en de PC met een numerieke processor. Tuurlijk, het is 
appels met peren vergelijken, want als de Atom ooit op 33 MHz loopt etc. maar toch 
het geeft een indruk van de prestaties. De PC versie is in assembler geschreven en de 
Atom draait gewoon in de interpreter mode. Heel gemeen dus. Maar toch, het gaat 
om de indruk. 

Deze cijfers zijn op basis van een Atom in PC op 2 MHz en een Intel 486 DX 33 MHz 
exemplaar. 

Als proef Is er 1.000.000 keer de sinus van Pl genomen en 1.000.000 maal de 
wortel uit 2. Uiteraard zou na | keer het resultaat van deze berekening al bekend zijn, 
maar het gaat hier om het veelvuldig doorlopen van de lus om een meetbare tjd te 
krijgen. In onderstaande listings staan de voorbeeld programma’s. Gemakshalve ga ik 
even voorbij aan de tijd die nodig is om gegeven van en naar de PC te krijgen. Het 
gaat hier puur om de capaciteiten van de Floating point chip. 


listing PC: 
title 1.000.000 x sin uit PI 
; FPTEST.ASM Test programma voor Atom Nieuws 
„386 
„387 :Sta 80387 Instructies toe 


; Het wordt een ‚com file, dus doe de noodzakelijke openings overture 
CSEG SEGMENT PARA PUBLIC ’CODE’ 
ASSUME CS:CSEG, DS:CSEG, ES:;CSEG, SS;CSEG 


ORG 100H 
AAT: JMP start 
start proc near 
MOV ECX, 10 ‚Doe dit stuk 10 keer 
lus: PUSH ECX 
MOV ECX, 100000 ;Doe dit stukje 100.000 keer 
NOP Wat allignment voor een event. 
debugger 
NOP 
loopie: FFREE ST(0} ;Maak de eerste stack positie vrij 
FLDPI sLaadt PI (3.14) op de stack 
FSIN ;Bepaal de sinus uit dit getal en 
plaats op stack 
LOOP loopie 
POP ECX 
LOOP LUS 


MOV EAX, 4COOH „Programma eindigen met foutcode 0 
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NOP 
NOP 
ENT 21H :Beeindig het programma 


start endp 
CSEG ENDS 


END AAT 


Listing Atom in PC 


10 REM benchmark voor Atom FP versus x87 FP 
20 FOR N=0 TO 1000000 
30 SA=SIN(PI) 


40 NEXT 
50 END 
Cijfers: 

1.000.000 x Sinus 1.000.000 x Wortel uit 2 
Atom: 35000 17000 
486: 2 2 
Emulator: 18 22 


N.B. 1 Tijd in Seconden 


N.B. 2 In de PC versie wordt voor de verandering gewerkt met de extended 
registers. Het is mogelijk om deze als 32 bits registers te gebruiken, hetgeen uiteraard 
zo zijn voordelen heeft. Let er verder op dat het een COM file is, dus dat met link een 
exe wordt aangemaakt en via EXE2BIN dit moet worden doorgezet na een COM file. 


N.B. 3 Alleen de verste met de Sinusberekening staat hier, Die van de wortel uit 
2 ts vrijwel identiek, maar wie er interesse voor heeft, moet dat maar via de distributie- 
kanalen van de PTT laten weten. Mailen kan ook, tegenwoordig zelfs via Intemer: 
L.M.Bijnagte@Robeco.nl 

Voor hen die een 386 DX hebben 


In het public domain circuit zwerft een uiterst aardig programma rond, wat het 
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mogelijk maakt om een applicatie te laten denken dat de processor waarop deze werkt 
er eentje van het type 486 is, terwijl er een 386 DX inzit. Let er op dat dit alleen 
voor een DX werkt, Gemakshalve heb Ik deze bij Henrl op zijn bulletin board geladen, 
en is daar dus te vinden. 

Ook zijn er speciale x87 emulatoren. Dat is een swkje software, dat het mogelijk 
maakt om floating point instructies na te bootsen in 386 hardware, Deze werkt 
onafhankelijk van het type. De emulatoren die ik ken, hebben ieder zo wat nukken. 
Vaak werkt dit niet helemaal okselfris onder Windows, met andere woorden: is niet 
geheel betrouwbaar. 

Volledigheidshalve, heb ik deze software, het betreft hier een shareware produkt, ook 
geladen op het u reeds genoemde bulletin board. 

Uiteraard kan er ook fysiek worden gesleuteld aan de behoefte tot een numerieke 
processor. Bij zorgvuldig napluizen van de advertenties is het mogelijk om voor ver 
onder de tweehonderd gulden een uiterst aardige en nieuwe numerieke processor op 
de kop te tikken. Niet alleen voor de Atom ís dit dan aardig, maar ook het copietfe 
van Autocad of het favoriete spreadsheet ’loopt’ vele malen harder. 


En hoe nu verder 


Zo als gezegd, het betreft hier alleen nog maar wat gedachten, er ís nog weinig voor 
geprogrammeerd, Maar met het potentleel wat nog in de PC aanwezig Is, In combinatie 
met de werkelijk uitstekende hard en software van Roland, is er nog erg veel mogelijk. 
U wordt op de hoogte gehouden van de verdere ontwikkelingen op dit vlak. 


Leendert 


Fitt DE 6532 RIOT NOG EENS BEKEKEN PEET 


Al een hele tijd geleden heb ik een verhaaltje gepubliceerd 
over een vervolg op de miniatom. Hierin werd een 6532 riot 
gebruikt. Toen heb ik beloofd om nog eens dieper op de timer 
van de riot in te gaan. Aangezien het systeem voor het dtmf 
gebeuren gebruikt gaat worden (in ieder geval voor testdoel- 
einden), werd het eens tijd om dit uit te zoeken. 


Nu eerst heel even herhalen wat we al weten. 
De riot bestaat uit: 


= 128 bytes RAM te adresseren d.m.v. 

CS1, CS2\, RS\ en AO t/m A6 
- twee 8 bits brede IO poorten zoals bij de via 
- een timer 


Bij de RAM zijn zeven adreslijnen nodig om de boel te selecte- 
ren. Men heeft deze adreslijnen echter ook gebruikt voor het 
maken van een groot aantal registers. Hierbij worden verschil- 
lende instellingen gemaakt door naar een bepaald register te 
schrijven, in plaats van iets in een bepaald register te 
schrijven!! Na een beetje puzzelen kwam ik tot de volgende 
memory-map, er zijn echter ook andere mogelijkheden. 


POORT _A EQU $B800 register datapoort A 

DDRA EQU POORT _2+$01 data direction register A 

POORT _B EQU POORT _A+$02 register datapoort B 

DDRB EQU POORT_A+$03 data direction register B 

R_FLAG EQU POORT _A+$05 READ Int flag register, 
clear PA7 flag 

W_CTRL1 EQU POORT _A+$0C WRITE edge detect, IRQ PA7 
disabled, edge PA7 neg 

W_CTRL2 EQU POORT_A+$0D WRITE edge detect, IRO PA7 
disabled, edge PA7 pos 

W_CTRL3 EQU POORT _A+$0E WRITE edge detect, IRQ PA7 
enabled, edge PA7 neg 

W_CTRL4 EQU POORT _A+$0F WRITE edge detect, IRQ PA7 
enabled, edge PA7 pos 

R_TIME1 EOU POORT_A+$04 READ timer, disable IRQ timer, 
clear timerflag 

R_TIME2 EQU POORT. A+$0C READ timer, enable IRQ timer, 
clear timerflag 

W_TIME1 EQU POORT _A+$14 WRITE timer, disable IRQ timer, 
clear timerflag, /T 

W_TIME2 EQU POORT_A+$15 WRITE timer, disable IRQ timer, 
clear timerflag, /8T 

W_TIME3 EQU POORT _A+$16 WRITE timer, disable IRQ timer, 
clear timerflag, /64T 

W_TIME4 EQU POORT _A+$17 WRITE timer, disable IRQ timer, 
clear timerflag, /1024T 

W_TIMES EQU POORT_A+$1C WRITE timer, enable IRQ timer, 


clear timerflag, /T 
W_TIME6 EQU POORT. A+S1D WRITE timer, enable IRQ timer, 
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clear timerflag, /8T 


W_TIME? EQU POORT_A+$1E WRITE timer, enable IRQ timer, 
clear timerflag, /64T 
W_TIME8 EQU POORT _A+$S1F WRITE timer, enable IRQ timer, 


clear timerflag, /1024T. 


Net zoals bij de gewone via zijn er dus twee data-direction 
registers en twee outputregisters voor de beide poorten. Ook 
is al eens vermeld dat er geen handshake-lijnen zijn (CAx en 
CBx), maar dat er toch een externe gebeurtenis kan worden 
gedetecteerd en dat daarmee een interrupt kan worden opgewekt. 
Dit gebeurt met IO-lijn PA7. Deze IO lijn kan namelijk net als 
de handshake-lijnen van de via een flank detecteren. 


Het instellen van PA7 gebeurt door naar één van de vier regis- 
ters W_CTRLx te schrijven, waarbij wordt ingesteld of PA7 moet 
reageren op een positieve of een negatieve flank en of hierbij 
een interrupt moet worden gegenereerd. In het Interrupt Flag 
Register wordt zowiezo altijd een bitje geset bij een gedetec- 
teerde flank, je kan dus kiezen of dit ook een interrupt moet 
opleveren. Het Interrupt Flag Register kan worden gelezen op 
adres R_FLAG en ziet er als volgt uit: 








Bij het lezen van dit register wordt de PA7 flag automatisch 
gewist. De timerflag wordt echter alleen gewist door het lezen 
of schrijven naar een timerregister! 


Het instellen van de timer gebeurt door te schrijven naar één 
van de acht registers W_TIMEx. Hierbij wordt dus de flag 
gewist en wordt ingesteld of er een interrupt moet komen als 
de timer is uitgeteld. De snelheid van dit tellen kan worden 
ingesteld op vier snelheden: 


- even snel als O2 : {T, 

- 8 keer langzamer als Q2 2 {8T, 

= 64 keer langzamer als Q2 : /64T, 

- 1024 keer langzamer als Q2 : /1024T. 


Dit laatste houdt dus in dat er bij een kloksnelheid van 1 MHz 
maximaal tot lef sec * 1024 * 256 = 0.262144 sec geteld kan 
worden. 


Bij het schrijven in W_TIMEx wordt de verlangde tijd in hex 
weggeschreven. Deze waarde wordt in de timer gezet en deze zal 
daarna aftellen naar nul met de ingestelde snelheid. Als hij 
bij 00000000 is aangekomen set hij de timerflag en geeft al 
dan niet een interrupt. Hierbij wordt de timer met 11111111 
geladen en begint deze af te tellen met Q2. 


Bij het lezen van het timerregister R_TIMEl of R_TIME2 wordt 
dan de flag gereset, de interrupt weggenomen en een bepaalde 
waarde ingelezen in een processorregister. Door nu van deze 
waarde de two’s complement te nemen en hierbij één op te 
tellen heb je de tijd die is verstreken na het genereren van 
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de interrupt. 


In de datasheet staat dat je bij dit lezen maar beter de 
interrupt kan disabelen, zodat er geen interrupts kunnen 
ontstaan. De teller telt namelijk door en dit zal wel weer een 
interrupt opleveren ats hij bij nul aankomt, hierna wordt hij 
weer met SFF geladen enz... Dus lezen met R_ TIME1 |! 


Dat je toch kan lezen met behoudt van de interrupt kan nodig 
zijn voor het tussentijds lezen van de timer als deze nog niet 
bij nul is aangekomen en dus nog geen interrupt heeft gegene- 
reerd. Hierbij lees je de nog resterende tijdsintervallen. 


Even alles nog in de goede volgorde: 


- Timer laden met waarde, deelfactor en interrupt-instelling. 

- Tussentijds lezen resterende tijd mogelijk, denk aan de 
interrupt instelling. 

- Timer $00 -> flag geset, IRQ mits ingesteld, timer 
wordt geladen met $FF en begint af te tellen met Q2 

- Timer lezen -> flag gereset, verstreken tijd sinds inter- 
rupt kan worden bepaald, IRQ graag disabelen door te lezen 
met R_TIME1 !! 


( De two's complement waarde van een getal krijg je door alle 
enen door nullen te vervangen en visa versa, bijvoorbeeld 
met EOR #SFF } 


Als laatste nog even de aansluitingen van de chip: 
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De nieuwe print voor de voorversterker, met daarop alle uit- 
breidingen geïntegreerd, werkt naar behoren. Toch zat er iets 
niet op wat tijdens het gebruik toch wel handig leek, namelijk 
battery-backup van het geheugen. Door de uitbreidingen die er 
zo nu en dan bij werden verzonnen, zijn er een aantal zaken 
die in het geheugen worden opgeslagen. Bijvoorbeeld de tekst 
die op het display verschijnt kan worden aangepast aan de 
aangesloten bron op die ingang. Als je het apparaat dan moet 
verplaatsen (voor een demonstratie of zo) zijn deze instellin- 
gen verdwenen. Aangezien er toch al een modificatie moest 
worden aangebracht kon een aanpassing van de nieuwe print er 
ook nog wel bij. Allereerst vertel ik even wat over deze 
modificatie en daarna volgt het verhaaltje over de battery- 
backup. 


GLITCH 


Bij het testen van de nieuwe print bleek deze niet te werken. 
Na het inschakelen van de processor schakelde deze zich gelijk 
weer uit, zonder eerst een opdracht te vervullen. Dit bleek te 
komen door een glitch op de uitgang van de decoder. De adres- 
decoder stuurt namelijk rechtstreeks de flip-flop voor het 
stoppen van de klok aan. Alg nu tijdens het veranderen van de 
adreslijnen heel heel heel eventjes dit adres op de ingangen 
van de decoder verschijnt en als die dat kan bijhouden en een 
heel heel klein pulsje op de uitgang zet en als de flip-flop 
daarna dit heel heel kleine pulsje toch ziet als een reset- 
puls, ja dan werkt het helaas niet meer. De oplossing is het 
meenemen van Q2, eigenlijk is dit het enige goede ontwerp; het 
oude is gewoon vragen om moeilijkheden en een echte ‘design 
error’, Dat het bij de oude versie van de print goed is gegaan 
kan aan twee dingen gelegen hebben, namelijk een andere print- 
layout of het toepassen van een ander (langzamer) merk logica. 


Op de volgende pagina staat het aangepaste stukje van het 
schema. Waar vroeger BOXX rechtstreeks aan de flip-flop was 
aangesloten, gebeurt dit nu d.m.v. twee extra poortjes en Q2. 


BATTERY - BACKUP 


In het verleden zijn er een aantal schema's gepubliceerd met 
battery-backup schakelingen. Verder zijn er ongeveer evenveel 
modificaties gepubliceerd als er schema's gepubliceerd zijn, 
dus in het verleden zal niet iedere schakeling goed gewerkt 
hebben. 


Tegerwoordig zijn er nieuwere oplossingen; geheugenic's met 
ingebouwde batterij, e?rom's al (PHILIPS) dan niet (28XXX serie 
XICOR) met IC bus, er is zelfs nu (bij Alcom) een geheugenic 
te krijgen met daarin gewone ram en e?rom. Tijdens het afscha- 
kelen van de voedingsspanning wordt de hele inhoud van de ram 
gekopieerd in de e?rom en bij power-up gebeurt het omgekeerde 
(echt waar). Van buiten zien de andere componenten echter een 
gewone ram volgens de (normale) JEDEC specs. 
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figuur 1; wijzigingen kloklogica 


Het toepassen van deze IC’s is echter niet gemakkelijk, of er 
moet veel geld voor worden betaald. Ook had ik nog een mooie 
lithiumbatterij van 3.6 volt liggen, een ideale batterij voor 
het backuppen van ram. 


Nu maakt DALLAS semiconductors een aantal IC's voor dit soort 
toepassingen. Ikzelf gebruik de DS1210. Aan de ene kant sluit 
je de 5 volt, de batterij en het chipselect-signaal van de 
legica aan en aan de andere kant de voeding en de chipselect 
van de RAM. En je bent klaar !!! Andere IC's uit deze serie 
hebben bijvoorbeeld nog ingebouwde adresdecodeer-logica, zodat 
je nog meer IC's kan uitsparen. Ook is er een serie verloop- 
voetjes van DALLAS op de markt, waar deze IC's op zitten, hoef 
je helemaal niets meer zelf te doen. Later zag ik dat ook 
Elektuur hierover iets gepubliceerd heeft in datasheetboek 3. 


Op de volgende pagina zie je het schema. Door een 6116 uit de 
rommelbak te gebruiken spaar ik verder een 62256 uit. Kan die 
62256 weer in de rommelbak. Verder heb ik nog een klein print- 
je gemaakt dat in het voetje van de originele RAM geplaatst 
wordt. Omdat dit dus van een 62256 naar een 6116 RAM gaat is 
dit niet echt universeel en daarom is dit printje ook niet 
gepubliceerd. Een ieder kan de DS1210 wel ergens tussen prut- 
sen i.p.v. zijn oude onwillige battery-backup schakeling. 
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figuur 2: battery-backup met de DS1210 


In het schema zie je dat er een tweede batterij kan worden 
aangesloten. Bij twee batterijen kiest het IC de volste batte- 
rij. Bij het aansluiten van 1 batterij moet men het andere 
pootje aan massa leggen. Met het pennetje TOL kan men de 
drempel instellen, waarbij het IC schakelt van hoofd- naar 
batterijvoeding. Dit is 4.6 volt bij TOL aan massa en 4.4 volt 
bij tol aan VCC. 


Als de batterijspanning daalt onder de 2 volt sluit het IC de 
lijn CEO\ af. Dit gebeurt alleen bij de tweede keer dat CEO\ 
laag zou moeten gaan. De eerste keer dat in het geheugen wordt 
gelezen na power-up doet het IC nog niets, je kan dan de data 
op die geheugenplaats inlezen. Hierna kan je dezelfde data nog 
een keer inlezen en als deze dan niet dezelfde waarde heeft 
als de eerste keer, omdat CEO\ geblokkeerd is, dan is de 
batterij dus ver leeg. Dit kunnen we dan weer mooi op het 
display vermelden, heb ik weer wat te programmeren. 


De DS1210 kost overigens fl 18,75 (slik) en is te koop bij 
Display in Eindhoven. 


literatuur: Dallas Semiconductor datasheet DS1210 
nonvolatile controller 


Guido Baltus 
Lunenschloszstraat 8 
6137 PJ Sittard 

tel 046-521035 
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Zelf printen maken. 


Misschien komt het hele verhaal dat nu volgt een beetje als 
mosterd na de (Ato)maaltijd in dit post-atomaire tijdperk, 
desondanks wil ik er toch "den volke kond” van doen, Voor 
zover mij bekend is er nooit eerder over dit onderwerp in Atom 
Nieuws geschreven. 

Hoewel je niet zo gauw gewapend met een soldeerbout een 
moderne computer in zal duiken is er met deze mac hines toch 
nog wel wat te doen op hardware gebied bv via de printer- of 
R8232 poort. Elke (ex)atomist krijgt toch na zekere tijd geen 
soldeerbout in de handjes gehad te hebben last van ernstige 
afkickverschijnselen. Dus hierbij steek ik dan maar eens van 
wal met mijn uiteenzetting. M'n allereerste printen tekende ik 
uit met behulp van toendertijd in de handel verkrijgbare 
setjes met lak om spoortjes te tekenen, een soort printbe- 
schermingslak en een flesje reinigingsmiddel om fouten te 
herstelten. Daarbij zat dan ook nog een plastic containertje 
met etszout en een reisbeschrijving. Echt mooi strak was 
hiermee niet te werken en voor elke te maken print moest je 
het hete schema opnieuw op het koper tekenen. 

Later kwam er een Atom in huis. Niet zelf gebouwd, ik had 
heilig ontzag voor halfgeleiders en alles wat daarmee te maken 
had. De krengetjes gingen al stuk als je er met je vinger naar 
wees. De toch nogal robuuste buizen apparaten waar ik tot dan 
toe mee experimenteerde lieten niet zo snel het leven. Als er 
met een buis iets fout dreigde te gaan begon ie meestal eerst 
te blozen, gauw de stroom eraf redde dan vaak nog net de zaak. 
De transistortjes, OC13, OC14 ,0C44 enz. lieten niets blijken 
maar gaven heel geniepig in stilte de geest, zonder zelfs nog 
maar even gemeen te stinken of zo. Toendertijd voor deze 
jongen z'n portemonnee te duur dus. Zodoende dus een keurig 
gebouwde kant en klare Atom gekocht en kort daarop lid gewor- 
den van de Atom club. De jongens daar stelden me gerust wat de 
jevoeligheid van de chipschakelingen betrof en daar heb ik dan 
ook voor het eerst de Atom van binnen gezien. Ik had niet het 
hart hem thuis open te schroeven. 

Later is dat allemaal wel weer recht gekomen, ziende dat op 
elubavonden zonder schroom chips uit een draaiende machine 
werden geplukt om een andere aan de gang proberen te krijgen, 

‘t kon blijkbaar echt niet kapot. Dan komt vanzelf de drang 
tot experimenteren met dit nieuwe medium naar boven. De tot nu 
toe gebruikte methode van printen maken was voor het veel 
fijnere werk wat in dit soort schakelingen verwacht wordt niet 
bruikbaar. Gedeeltelijk zelf en gedeeltelijk met de hulp van 
anderen leerde ik een eigen manier van printen ontwikkelen 
zonder gebruik van dure apparatuur en/of programmatuur. Ik 
gebruikte voor het ontwerpen de oudst bekende computer, m'n 
eigen koppie. Dan nu het hoe en wat. 
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Het idee. 

Het eerste wat je nodig hebt om een print te gaan maken is een 
idee, dit of dat zou ik wel eens graag door m'n atom willen 
laten doen of meten of wat dan ook. Dit idee moet je gaan 
uitwerken tot een realiseerbaar schema met als het even kan 
een hoge waarschijnlijkheids graad dat het na de bouw nog 
werkt ook. Zulke dingen zijn goed uit te proberen met een 
zogenaamd breadboard, in de wandelgangen broodplank genaamd, 
een plankje met een groot aantal gaatjes die in rijen met 
elkaar contact maken en waarin je IC's, weerstanden, transis- 
tortjes en dies meer kan prikken. Als de gewenste schakeling 
daarop werkt zoals je wilt kan de zaak in een schema worden 
vastgelegd. 


Het printontwerp. 
Om een print te realiseren begin je met het schema uit te 
werken in IC-tjes, weerstandjes e.d.. Dit gaat het gemakke- 
lijkst op ruitjes papier met ruitjes van een halve cm. Elk 
ruitje staat voor de afstand van een IC pinnetje, waartussen- 
door dan nog net een spoortje kan lopen. Sporen en onderdelen 
teken je dan zo dat het ís alsof je van de onderdelenkant van 
de print af tegen de binnenkant van de spoortjes en eilandjes 
aan de onderkant aankijkt. Beetje bij beetje werk je zo het 
hele schema uit tot je een oplossing krijgt die zo gunstig 
mogelijk uitvalt wat de plaatsing van IC's en andere onderde- 
len betreft en met zo min mogelijk draad bruggen. Draadbruggen 
kun je aangeven door van het eilandje waarvan ze vandaan komen 
een pijltje te zetten naar het eilandje waar ze naar toe 
moeten, en dit eilandje dan weer te voorzien van een ik zal 
maar zeggen “ontvang“pijltje. Zo ongeveer als volgt 
-0> >0- 
=0< <O- 
=O) >0- 
Bij meer draadbruggen naast elkaar maak je dan de richting 
tegengesteld om verwarring te voorkomen. Je kunt draadbruggen 
natuurlijk ook in een andere kleur intekenen, maar ik vind 
zelf dat het dan een nogal volle en rommelige boel wordt op de 
ontwerptekening. Bíj grote schema's is het makkelijker om 
blokken van bij elkaar horende IC's apart uit te werken en die 
pas die later op de totale print in te passen. 


Het afwrijven. 

Als de ontwerpfase op ruitjes papier naar jouw idee voltooid 
is, ìs het verstandig om de hele zaak nog eens een of twee 
maal grondig door te nemen om te controleren of er niets 
vergeten of verkeerd verbonden is. 

Daarna kun je je werkstuk gaan overbrengen op ware grootte op 
een stuk calceerpapier of het tegenwoordig veel mooiere maar 
ook duurdere kunststof transparant papier. 
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Om dit te bewerkstelligen zijn in de handel kaartjes te krij- 
gen met symbooltjes. Zo zijn er kaartjes met eilandjes in 
verschillende grootten, lijntjes, bochtjes, rijtjes eilandjes 
op IC-pin afstand en zelfs met lettertjes om bijv. op de print 
aanduidingen te zetten. Je moet er wel aan denken dat die 
lettertjes aan de achterkant van je afwrijfvel komen omdat ze 
anders in spiegelbeeld op de uiteindelijke print verschijnen. 
Voordat je begint met het aanbrengen van sporen e.d. is het 
verstandig de grootte van de print op je calceerpapier af te 
tekenen met potlood en dan als eerste de plaats van eventuele 
connectoren te bepalen. Vervolgens reken je met behulp van het 
ruitjes papier en een velletje "eilandjes op steekafstand" uit 
waar de grote onderdelen als IC's e.d. komen te staan. De 
symbooltjes krijg je van het kaartje op je calceerpapier door 
het bewuste symbooltje op de juiste plek te houden en er 
zachtjes met de punt van een lege ballpoint of iets anders met 
een afgeronde punt over te wrijven. Je kunt zien aan het vager 
worden van het symbooltje dat het loslaat van het kaartje en 
zich hecht aan het calceerpapier. Het calceerpapier kun je het 
beste op een harde ondergrond leggen om doordrukken te voorko- 
men, het moet zo glad mogelijk blijven. Een stukje plexiglas 
kan hiervoor uitstekend dient doen. Vervolgens kun je beginnen 
met het leggen van de verbindingen. Zorg er hierbij voor dat 
je met de lijntjes niet de gaatjes in de eilandjes dichtplakt. 
Dit is belangrijk voor als je later de geetste print moet gaan 
boren. Als je lange verbindingen met lijntjes hebt is het 
gemakkelijker deze voor het aanbrengen voorzichtig aan de 
binnenkant van het kaartje op lengte af te snijden met een 
stanley mesje, terwijl het lijntje nog op het kaartje zit. Het 
wil nog wel eens gebeuren dat er een stukje lijn teveel van 
het kaartje op je afwrijfvel terechtkomt met soms als gevolg 
dat er een gaatje in een eilandje dicht komt te zitten. Als 
alle verbindingen zijn gemaakt en na een laatste controle 
alles in orde blijkt is het moeilijkste werk achter de rug. 
Bewaar dit kunstwerkje zorgvuldig en zorg dat het absoluut 
niet nat wordt. Calceerpapier vervormt door vocht en komt 
nooit meer terug in de oude vorm en wordt daarmee dus onbruik- 
baar om af te drukken. Het enige wat er in zo'n geval op zit 
is het maken van een nieuw origineel. 

Bewaar het dus tussen een ander opgevouwen blad calceerpapier 
in een plastic opberghoes o.i.d... 


Het fotogevoelig printmatriaal. 

Nu de truc om de gemaakte afwrijf over te brengen op een 
print. Hiervoor zijn verschillende mogelijkheden. Je kunt in 
de winkel kant en klaar licht gevoelig printmatriaal in diver- 
se maten kopen. Je kunt ook gewoon een stuk printmatriaal zelf 
Eotogevoelig maken met in de handel zijnde containertjes met 
fotogevoelige vloeistof en ontwikkelaar. 
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Bij beide manieren is het zaak om de zijkanten van de print 
voorzichtig 45 graden schuin af te vijlen om eventueel 
aanwezige braampjes te verwijderen. Deze braampjes kunnen last 
bezorgen tijdens het betichten van de print omdat ie dan niet 
goed vlak op het matglas gedrukt kan worden. 

Als je je printmatriaal zelf fotogevoelig wilt maken, wat heel 
goed te doen is, moet je de te behandelen printplaat eerst 
zorgvuldig reinigen en schuren met iets van jif of zo. Vervol- 
gens de plaat reinigen met gewone zeep en warm water en daarna 
het koper niet meer met de vingers aanraken. Wrijf de plaat 
droog met een brandschone niet pluizende doek. Het opbrengen 
van het fotogevoelig matriaal doe je het beste op een wat 
donkere plek. Dit soort activiteiten kunnen het daglicht niet 
velen, echt stikkedonker hoeft nou ook weer niet. Wrijf de 
plaat gelijkmatig in met vloeistof en leg hem donker, warm, 
horizontaal en vooral stofvrij te drogen. Zelf maakte ik m'n 
printen meestal ‘s-avonds klaar en zette ze ‘s-nachts in een 
oud koekblik met de deksel op een kier en een donkere doek 
erover, op de radiator van de verwarming. De andere ochtend 
waren ze dan klaar voor gebruik. 


Het afdrukken. 

Voor het belichten heb je een belichtingsbak nodig, en dat is 
dan in deze hele procedure het enige probleem. Als je er geen 
hebt moet je dus proberen of je bij een goede kennis, mede 
atomist of misschien je elektronica leverancier je print even 
belichten mag. Kijk voor je gaat belichten nog eens even naar 
je afwrijfvel door het tegen het licht te houden of er mis- 
schien onderbrekinkjes in de spoortjes zitten. Nu kun je ze 
nog eenvoudig dichtplakken. Je legt dan je gemaakte afwrijfvel 
met de afwrijfkant naar boven op het matglas. Daarbovenop, 
precies binnen het eerder uitgetekende kader de print met de 
gevoelige kant omlaag op je afwrijfvel. Het is raadzaam om bij 
kant en klaar gekocht fotogevoelig printmatriaal de donkere 
plastic afdekfolie er nu af te halen. Meestal zit in de deksel 
van het apparaat een mechanisme of een dikke laag schuimrubber 
die de printplaat ea de afwrijf stevig op het matglas drukt 
zodat er geen licht kan kieren tussen de getekende spoortjes 
enz. en het fotogevoelig matriaal. Klep dicht en belichtings- 
tijd instellen, 2,5 a 3 minuten is meestal genoeg. Het ligt 
een beetje aan het aantal buizen waarmee het apparaat is 
uitgerust, deze tijd kan dus langer of korter zijn. 


Het ontwikkelen. 

Na het belichten kan de plaat meteen ontwikkeld worden door de 
vloeistof uit het ontwikkelcontainertje over de zelfgemaakte 
plaat te smeren en af te wachten, of de plaat in een badje van 
een halve liter lauw water met daarin van te voren goed opge- 
lost een volle theelepel caustic soda. Laat het geheel goed 
uitontwikkelen en spoel de print pas af als alle koper dat 
blank moest blijven ook weer goed blank is. Daarna afspoelen 
en laten drogen. 
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zelf laat ík ze dan meestal een dagje staan, omdat het me een 
keer gebeurd is dat ik, toen ik een plaat direct na het 
ontwikkelen in het etsmiddel kieperde, de spoortjes na even 
etsen begonnen los te laten. Wat de preciese oorzaak daarvan 
is geweest weet ik niet, maar ik vermoed dat het matriaal dat 
loskwam nog te vers was. 


Het etsen. 

Voor het etsen van je print zijn in de handel verschillende 
middelen in de handel over het algemeen voorzien van een goede 
gebruiks aanwijzing. Maak de vloeistof oplossing niet te warm, 
dit kan de werking nadelig beinvloeden en wees er voorzichtig 
mee want het is behoorlijk agressief goedje. Leg de print met 
de sporen kant naar omlaag in de vloeistof en roer er zo nu en 
dan wat in. Na verloop van tijd zul je zien dat de plaat 
plaatselijk lichter begint te worden. Op deze plaatsen is het 
koper dan al verdwenen. Licht de print zo nu en dan even op om 
te zien hoe ver het proces gevorderd is. Haal de print pas uit 
de vloeistof als er geen koperdeeltjes meer te zien zijn, 
anders dan het getekende sporenplan. 

Wat nu nog rest is het boren en bouwen van je zelf ontwikkelde 
print. Gebruik voor het boren HSS boortjes van 1 mm, dat is 
voor de meeste onderdelen groot genoeg. bij het boren met een 
grotere maat boor houdt je te weinig “vlees” over om onderde- 
len stevig vast te solderen, en sneuvelen de eilanjes vaak als 
je eens onderdelen wilt vervangen. Controleer voor je gaat 
bouwen grondig of er misschien kortsluitingen tussen spoortjes 
voorkomen, dit controleren gaat veel gemakkelijker op een lege 
als op een volgebouwde print. 

Het zelf vervaardigen van printjes op deze wijze is heel goed 
te doen. In de regio Den Haag is op deze wijze heel wat geex- 
perimenteerd met toch ook op landelijk gebied bekend geworden 
gevolgen als de VIA-kaart voor het CP/M gebeuren en de nodige 
geheugen uitbreidingen van de Atom, ontworpen door Willem 
Kautz, van wie ik trouwens veel van het voorafgaande uit dit 
verhaal geleerd heb. Ook Jasper Boot mag ik in deze niet 
vergeten, waarvoor bij deze nog eens mijn dank. 

Tot zover dan deze lezing, beminde broeders, misschien kan 
iemand er nog wat mee. 


vriendelijke groeten, 
Theo Waaijer. 
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1. Pascal en Roland Leurs hebben onlangs hun huwelijk ook 
kerkelijk laten inzegenen, waarbij een afvaardiging van de club 
aanwezig was. 
Het Lijkt zinvol te laten weten , dat ze per 1 augustus a.s. 
verhuizen naar Geldermalsen; Roland werkt in Utrecht, vandaar. 
Het nieuwe adres is : Hooge Hoeven 62 

4191 MN Geldermalsen 

tel. 03455-72970, 
Uiteraard is het raadzaam, niet voor 15 augustus aan de bel te 
hangen. 


2. Van de 1/O-kaart voor de ATOM-in-PC zijn inmiddels 6 
exemplaren vervaardigd 
Emile Hounjet was bereid de dubbelzijdige print te etsen, 
teneinde de kosten laag te houden bij een zo gering aantal. 
Willy Truyen zorgde ervoor dat een alternatieve AB-connector 
op de kaart werd gesoldeerd, met het nodige kunst en vliegwerk. 
Beiden hebben hier de nodige uren aan besteed, waardoor het 
mogelijk was dat eenieder deze kaart ook daadwerkelijk kan gaan 
bouwen , daarvoor past onze dank. 
De kosten voor deze kaart , inclusief de connector , bedragen 
El. 25,-. Overmaken van dit bedrag aan Thijs Rutten maakt het 
mogelijk de kaart te verzenden aan de liefhebbers. 
Als bestellers staan op dit moment bij ons te boek 

Theo Waayer, 

H.v.d. Heyden 
Wie volgt, ?. 
Uiteraard dient er ook nog een gal bij te komen , kosten £1.3,- 
indien door ons { Willy Truyen ) geleverd. 





3. Inmiddels is er een bijeenkomst geweest met een groepering 
gehoorgestoorden, waarbij duidelijk werd dat er toch echt 
behoefte is aan twee apparaten: 

a. Een zelfstandig DTMF-modem, aan te sluiten via een seriële 
verbinding aan een PC, 

b. Een stand-alone apparaat, toetsenbord-inclusief een simpel 
display, waarmee familie van gehoorgestoorden Kunnen 
communiceren met hen. 

Voor het eerste wordt nu hard gewerkt aan een combinatie van 
een Miniatom + DTMF-kaart + seriële kaart als voorloper van een 
geintegreerd apparaat, dat mogelijk zelfs gebaseerd wordt op 
een andere processor. 

Voor het tweede apparaat wordt gewacht op de geintegreerde 
versie, het wordt een varjant daarvan. 

Roland Leurs en G. Baltus vooral dragen dit project , al zijn 
beiden om verschiliende redenen even met andere belangrijkere 
zaken bezig. 


Bruno Tossaint 


